From: Markus Rost <rost@math.uni-bielefeld.de>
Date: Tue, 12 Nov 2002 01:41:25 +0000 (+0000)
Subject: (defgroup edt): Arrange that definition starts at beginning of line.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~29795
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=579a2faac7031b7612970b616600ea9d6ac0f6f0;p=emacs.git

(defgroup edt): Arrange that definition starts at beginning of line.
---

diff --git a/lisp/emulation/edt.el b/lisp/emulation/edt.el
index 43b7b9ec6c1..ecb53bdffbf 100644
--- a/lisp/emulation/edt.el
+++ b/lisp/emulation/edt.el
@@ -166,13 +166,14 @@
 ;;;; VARIABLES and CONSTANTS
 ;;;;
 
-;; For backward compatibility to Emacs 19, skip this if defgroup is
-;; not defined.
-(if (fboundp 'defgroup)
-    (defgroup edt nil
-      "Emacs emulating EDT."
-      :prefix "edt-"
-      :group 'emulations))
+;; For backward compatibility to Emacs 19.
+(or (fboundp 'defgroup)
+    (defmacro defgroup (&rest rest)))
+
+(defgroup edt nil
+  "Emacs emulating EDT."
+  :prefix "edt-"
+  :group 'emulations)
 
 ;;;
 ;;;  Version Information